home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / win_utl2 / macman50.zip / VB.MAC < prev    next >
Text File  |  1994-06-17  |  497b  |  27 lines
  1.  
  2. {*open for binary}on error goto fileopenerror:~open filename for binary as #1~
  3. {*Select case}
  4. {*often used DIM statement}dim x as integer~dim y as integer~dim temp as string~
  5.  
  6. {*False}False
  7.  
  8.  
  9. {*integer}integer
  10.  
  11.  
  12. {*For/Next loop}for x = 1 to {PAUSE}~~next x{UP}  
  13.  
  14. {*if/then/else}if {PAUSE} then~ ~else~  ~end if{UP 3}
  15. {*open for output}on error goto fileopenerror:~open filename for output as #1~
  16. {*put #1}put #1, ,
  17.  
  18.  
  19. {*Step 10 while debugging}{F8 10}
  20. {*True}True
  21.  
  22.  
  23.  
  24.  
  25.  
  26.  
  27.